        Dim cust5 As Customer = New Customer With {.Name = "Toni Poe"}